(ido-copy-current-file-name): Repeating C-w inserts whole file name.

diff --git a/lisp/ido.el b/lisp/ido.el
index 1bc9a4dcef712c4ea403c35270a8ed73c13be65c..efea9a9fbb964f58ebfc2e1eb0ec8f7033c160f6 100644 (file)
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -2898,6 +2898,7 @@ If repeated, insert text from buffer instead."
     (when name
       (setq ido-text-init
            (if (or all
+                   (eq last-command this-command)
                    (not (equal (file-name-directory bfname) ido-current-directory))
                    (not (string-match "\\.[^.]*\\'" name)))
                name